-- @Author: 作者QQ381990860
-- @Date:   2021-10-20 00:02:24
-- @Last Modified by:   作者QQ201878826
-- @Last Modified time: 2022-09-05 19:58:38
local 物品={
月华露=function(user,Item,PitchOn)
        if user.召唤兽.数据[PitchOn].等级 >= 30 then
            user.召唤兽:添加经验(Item.品质 * 2 * user.召唤兽.数据[PitchOn].等级 + 100, user.id, PitchOn, 10)
        else
            user.召唤兽:提级处理1(PitchOn, id, 30)
        end
end,
内丹开孔符=function(user,Item,PitchOn)
        if user.召唤兽.数据[PitchOn].内丹.总数 >= 6 then
              发送数据(user.连接id, 7, "#y/你的这只召唤兽内丹已经开满无法再使用")
            return true
        else
            user.召唤兽.数据[PitchOn].内丹.总数=user.召唤兽.数据[PitchOn].内丹.总数+1
            user.召唤兽.数据[PitchOn].内丹.可用数量=user.召唤兽.数据[PitchOn].内丹.可用数量+1
             发送数据(user.连接id, 7, "#y/你已经成功开启了一个召唤兽内丹格子")
        end
end,

召唤兽开孔符 = function(user,Item,PitchOn,Text)

               local 临时技能={"再生","飞行","冥思","慧根","水攻","敏捷","落岩","烈火","驱鬼","神迹","雷击","鬼魂术","连击","永恒","招架","必杀","反震","夜战","反击","偷袭","防御","幸运","水属性吸收","土属性吸收","雷属性吸收","火属性吸收"}
                临时技能=临时技能[math.random(1,#临时技能)]
              if 玩家数据[user.id].召唤兽.数据.参战~=0 and #玩家数据[user.id].召唤兽.数据[玩家数据[user.id].召唤兽.数据.参战].技能<=13 then
                玩家数据[user.id].召唤兽.数据[玩家数据[user.id].召唤兽.数据.参战].技能[#玩家数据[user.id].召唤兽.数据[玩家数据[user.id].召唤兽.数据.参战].技能+1]=置技能(临时技能)

                发送数据(玩家数据[user.id].连接id,7,"#y/你的这只召唤兽学会了新技能#r/"..临时技能)
              else
                发送数据(玩家数据[user.id].连接id,7,"#y/请将需要开孔的召唤兽处于参战状态或以超过开孔符使用限制")
                return true
              end
end,
五行石=function(user,Item,PitchOn)
            user.召唤兽.数据[PitchOn].五行=生成五行()
            发送数据(user.连接id,7,"#Y/你的这只召唤兽五行已经发生了变化")
end,
元宵=function(user,Item,PitchOn)
        if 200 + math.floor(user.召唤兽.数据[PitchOn].等级 / 10) <= user.召唤兽.数据[PitchOn].元宵 then
            发送数据(user.连接id, 7, "#y/你的这只召唤兽已经无法服用更多的元宵了")
            return true
        end
        user.召唤兽.数据[PitchOn].元宵 = user.召唤兽.数据[PitchOn].元宵 + 1
       local 添加数额 = 0
        if Item.参数 == "攻资" or Item.参数 == "速资" or Item.参数 == "躲资" or Item.参数 == "防资" then
            if user.召唤兽.数据[PitchOn][Item.参数] < 1300 then
                添加数额 = 15
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 1400 then
                添加数额 = 10
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 1500 then
                添加数额 = 5
            else
                添加数额 = 3
            end
        elseif Item.参数 == "体资" then
            if user.召唤兽.数据[PitchOn][Item.参数] < 3000 then
                添加数额 = 20
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 4000 then
                添加数额 = 15
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 5000 then
                添加数额 = 10
            else
                添加数额 = 5
            end
        elseif Item.参数 == "法资" then
            if user.召唤兽.数据[PitchOn][Item.参数] < 2000 then
                添加数额 = 20
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 2500 then
                添加数额 = 15
            elseif user.召唤兽.数据[PitchOn][Item.参数] < 2800 then
                添加数额 = 10
            else
                添加数额 = 5
            end
        end
        user.召唤兽.数据[PitchOn][Item.参数] = user.召唤兽.数据[PitchOn][Item.参数] + 添加数额
        发送数据(user.连接id, 7, "#y/你的这只召唤兽" .. Item.参数 .. "增加了" .. 添加数额 .. "点")
        发送数据(user.连接id, 7, "#y/你的这只召唤兽已经服用了" .. user.召唤兽.数据[PitchOn].元宵 .. "个元宵")
end,
炼兽真经=function(user,Item,PitchOn)
        if  user.召唤兽.数据[PitchOn].炼兽真经 >=100 then
            发送数据(user.连接id, 7, "#y/你的这只召唤兽已经无法服用更多的炼兽真经了")
            return true
        elseif user.召唤兽.数据[PitchOn].成长 >= 1.35 then
            发送数据(user.连接id, 7, "#y/你的这只召唤兽成长已经超过1.35无法在使用炼兽真经了")
            return true
        end
        user.召唤兽.数据[PitchOn].炼兽真经 = user.召唤兽.数据[PitchOn].炼兽真经 + 1
        local 随机成长 = math.random(5)/1000
        user.召唤兽.数据[PitchOn].成长 = user.召唤兽.数据[PitchOn].成长 + 随机成长
        发送数据(user.连接id, 7, "#y/你的这只召唤兽成长提升了#R/"..随机成长.."#Y/点")
        发送数据(user.连接id, 7, "#y/你的这只召唤兽已经服用了" .. user.召唤兽.数据[PitchOn].炼兽真经 .. "个炼兽真经")
end,
固神丹=function(user,Item,PitchOn)

        local v = {}
           for i=1,#user.召唤兽.数据[PitchOn].技能 do
              if not user.召唤兽.数据[PitchOn].技能[i].固神  and not user.召唤兽.数据[PitchOn].技能[i].认证 then
                v[#v+1] = user.召唤兽.数据[PitchOn].技能[i].名称
               end
           end
          if #v>1  then
              发送数据(user.连接id, 20,{"道士","固神","请你选择需要固神的技能,召唤兽标识"..PitchOn,v})
          else
            发送数据(user.连接id, 20,{"道士","固神","固神已满,请保留一个技能"})
            return true
          end
end,

易经丹=function(user,Item,PitchOn)
          if user.召唤兽.数据[PitchOn].内丹.可用数量 ~= 0 then
                发送数据(user.连接id,7,"#y/你召唤兽内丹还有空余格子无法使用")
                return true
            end
           if user.召唤兽.数据[PitchOn].灵性 < 50 and  (user.召唤兽.数据[PitchOn].参战等级 >=45 or user.召唤兽.数据[PitchOn].类型=="神兽") and user.召唤兽.数据[PitchOn].内丹.可用数量 == 0  then
                user.召唤兽.数据[PitchOn].灵性 = 10+ user.召唤兽.数据[PitchOn].灵性
                if user.召唤兽.数据[PitchOn].灵性>= user.召唤兽.数据[PitchOn].最高灵性 then
                user.召唤兽.数据[PitchOn].潜能 =user.召唤兽.数据[PitchOn].潜能+((user.召唤兽.数据[PitchOn].灵性-user.召唤兽.数据[PitchOn].最高灵性)*2)
                user.召唤兽.数据[PitchOn].最高灵性=10+ user.召唤兽.数据[PitchOn].最高灵性
                end
                发送数据(user.连接id,7,"#y/你的召唤兽"..user.召唤兽.数据[PitchOn].名称.."服用一个易经丹后,神清气爽,仙气缭绕,修为增加！")

                if user.召唤兽.数据[PitchOn].灵性 >= 50 and not user.召唤兽.数据[PitchOn].进阶  then
                   user.召唤兽.数据[PitchOn].进阶 = true
                    发送数据(user.连接id,7,"#y/"..user.召唤兽.数据[PitchOn].造型.."造型已变为#r/进阶"..user.召唤兽.数据[PitchOn].造型)
                      user.召唤兽.数据[PitchOn].造型 ="进阶"..user.召唤兽.数据[PitchOn].造型
                end
          elseif user.召唤兽.数据[PitchOn].灵性 > 79  then
              local 随机特性={"复仇","自恋","灵刃","灵法","预知","灵动","瞬击","瞬法","抗法","抗物","阳护","识物","护佑","洞察","弑神","御风","顺势","怒吼","逆境","乖巧","力破","识药","吮魔","争锋","灵断"}
              local a =随机特性[math.random(1,#随机特性)]
              user.召唤兽.数据[PitchOn].特性 = a
              user.召唤兽.数据[PitchOn].特性几率 =math.random(5)
              发送数据(user.连接id,7,"#y/你的召唤兽"..user.召唤兽.数据[PitchOn].名称.."领悟了#r/"..a)
          else
               发送数据(user.连接id,7,"#y/你的召唤兽不符合使用条件")
               return true
          end
end,

萝卜王=function(user,Item,PitchOn)
        if user.召唤兽.数据[PitchOn].类型=="神兽" then
            发送数据(user.连接id,7,"#y/这个召唤兽无法使用")
            return true
        end
            user.召唤兽.数据[PitchOn].寿命=user.召唤兽.数据[PitchOn].寿命+1000
            发送数据(user.连接id,7,"#Y/你的这只召唤兽寿命增加了1000点")
end,
玉葫灵髓=function(user,Item,PitchOn)
          if user.召唤兽.数据[PitchOn].内丹.可用数量 ~= 0 then
          发送数据(user.连接id,7,"#y/你召唤兽内丹还有空余格子无法使用")
          return true
          end
          if user.召唤兽.数据[PitchOn].灵性 > 50 and (user.召唤兽.数据[PitchOn].参战等级 >=45 or user.召唤兽.数据[PitchOn].类型=="神兽") then
              user.召唤兽.数据[PitchOn].灵性 = 50
              for k,v in pairs(全局变量.基础属性) do
                 user.召唤兽.数据[PitchOn].进阶属性[v] = 0
              end
              user.召唤兽.数据[PitchOn].最高灵性显示 = true
              user.召唤兽.数据[PitchOn].特性 ="无"
              发送数据(user.连接id,7,"#y/你的召唤兽"..user.召唤兽.数据[PitchOn].名称.."服用一个玉葫灵髓后,灵性已回归原始！")
           else
               发送数据(user.连接id,7,"#y/你的召唤兽灵性必须大于50才能使用")
               return true
           end
end,
神兽石=function(user,Item,PitchOn)

        if user.召唤兽.数据[PitchOn].类型== "神兽" then
              发送数据(user.连接id, 7, "#y/你的这只召唤兽已经是神兽了")
            return true
        else
            user.召唤兽.数据[PitchOn].类型="神兽"
            user.召唤兽.数据[PitchOn].神兽升级=0

             发送数据(user.连接id, 7, "#y/恭喜你成功改变此召唤兽为神兽")

        end
end,
神兜兜=function(user,Item,PitchOn)
              if user.召唤兽.数据[PitchOn].类型 ~= "神兽" then
              发送数据(user.连接id, 7, "#y/你的这只召唤兽不是神兽无法提高属性")
              return true
              elseif user.召唤兽.数据[PitchOn].神兽升级>=8 then
              发送数据(user.连接id, 7, "#y/你的神兽已经无法在提高属性了")
              return true

              end
            local sxsl  = user.召唤兽.数据[PitchOn].神兽升级*150 +50
              if  not Item.数量  or Item.数量 < sxsl then
                发送数据(user.连接id, 7, "#y/你的神兽下一次提高属性需要#r/"..sxsl.."#y/个神兜兜")
                return true
              end
              Item.数量=Item.数量-sxsl+1
            user.召唤兽.数据[PitchOn].神兽升级=user.召唤兽.数据[PitchOn].神兽升级+1
            user.召唤兽.数据[PitchOn].成长 =user.召唤兽.数据[PitchOn].成长+0.1
            发送数据(user.连接id, 9, "#xt/#y/你的#g/"..user.召唤兽.数据[PitchOn].名称.."已经成长提高#r/0.1")
            for k,v in pairs(全局变量.资质标识) do
                 user.召唤兽.数据[PitchOn][v]= user.召唤兽.数据[PitchOn][v]+100
                  发送数据(user.连接id, 9, string.format("#xt/#y/你的#g/%s已经%s提高#r/100#y/点",user.召唤兽.数据[PitchOn].名称,v))
            end
            发送数据(user.连接id, 7, "#y/恭喜你的神兽已经完成了第#r/"..user.召唤兽.数据[PitchOn].神兽升级.."#y/次升级，还可以升级#g/"..(10-user.召唤兽.数据[PitchOn].神兽升级))
end,
灵兜兜=function(user,Item,PitchOn)

              if user.召唤兽.数据[PitchOn].类型 ~= "神兽" then
              发送数据(user.连接id, 7, "#y/你的这只召唤兽不是神兽无法提高属性")
              return true
              elseif user.召唤兽.数据[PitchOn].神兽升级>8 then
              发送数据(user.连接id, 7, "#y/你的神兽已经无法在提高属性了")
              return true

              end
            local sxsl  = user.召唤兽.数据[PitchOn].神兽升级*150 +50
              if  not Item.数量  or Item.数量 < sxsl then
                发送数据(user.连接id, 7, "#y/你的神兽下一次提高属性需要#r/"..sxsl.."#y/个灵兜兜")
                return true
              end
              Item.数量=Item.数量-sxsl+1
            user.召唤兽.数据[PitchOn].神兽升级=user.召唤兽.数据[PitchOn].神兽升级+1
            user.召唤兽.数据[PitchOn].成长 =user.召唤兽.数据[PitchOn].成长+0.05
            发送数据(user.连接id, 9, "#xt/#y/你的#g/"..user.召唤兽.数据[PitchOn].名称.."已经成长提高#r/0.1")
            for k,v in pairs(全局变量.资质标识) do
                 user.召唤兽.数据[PitchOn][v]= user.召唤兽.数据[PitchOn][v]+50
                  发送数据(user.连接id, 9, string.format("#xt/#y/你的#g/%s已经%s提高#r/50#y/点",user.召唤兽.数据[PitchOn].名称,v))
           end
            发送数据(user.连接id, 7, "#y/恭喜你的神兽已经完成了第#r/"..user.召唤兽.数据[PitchOn].神兽升级.."#y/次升级，还可以升级#g/"..(10-user.召唤兽.数据[PitchOn].神兽升级))
       -- end


end,
高级清灵仙露=function(user,Item,PitchOn)
            if user.召唤兽.数据[PitchOn].内丹.可用数量 ~= 0 then
                发送数据(user.连接id,7,"#y/你召唤兽内丹还有空余格子无法使用")
                return true
            elseif user.召唤兽.数据[PitchOn].灵性> 100  then
                发送数据(user.连接id,7,"#y/你召唤兽已经无法使用清灵仙露")
                return true
            elseif user.召唤兽.数据[PitchOn].灵性 < 50 then
                发送数据(user.连接id,7,"#y/你的召唤兽灵性必须达到50以上才能使用")
                return true
            end
            local 临时灵性
            if  Item.灵气 == 8 and math.random(100) < 60  then
                  临时灵性 = math.random(9,10)
            else
                  临时灵性 =  Item.灵气
            end
            user.召唤兽.数据[PitchOn].灵性 = 临时灵性+ user.召唤兽.数据[PitchOn].灵性
            if user.召唤兽.数据[PitchOn].灵性> user.召唤兽.数据[PitchOn].最高灵性 then
                    user.召唤兽.数据[PitchOn].潜能 =user.召唤兽.数据[PitchOn].潜能+((user.召唤兽.数据[PitchOn].灵性-user.召唤兽.数据[PitchOn].最高灵性)*2)
                   if user.召唤兽.数据[PitchOn].灵性 < 临时灵性+  user.召唤兽.数据[PitchOn].最高灵性 then
                      user.召唤兽.数据[PitchOn].最高灵性 = user.召唤兽.数据[PitchOn].灵性
                   else
                       user.召唤兽.数据[PitchOn].最高灵性=临时灵性+  user.召唤兽.数据[PitchOn].最高灵性
                   end
            end
            发送数据(user.连接id,7,"#y/你的召唤兽"..user.召唤兽.数据[PitchOn].名称.."增加了#r/"..临时灵性.."#y/点灵性")
            if user.召唤兽.数据[PitchOn].灵性 >= 110  then
                for k,v in pairs(全局变量.基础属性) do
                    user.召唤兽.数据[PitchOn].进阶属性[v]=math.random(20,100)
                    发送数据(user.连接id,7,"#y/增加进阶属性"..user.召唤兽.数据[PitchOn].进阶属性[v].."#y/点")
                end
            end
end,
}
物品.中级清灵仙露 =物品.高级清灵仙露
物品.初级清灵仙露 =物品.高级清灵仙露

function 道具处理类:召唤兽道具使用(user,Item,PitchOn)
    if PitchOn==0 then
        发送数据(user.连接id, 7, "#y/请你选中一只召唤兽才能使用")
        return true
    elseif user.召唤兽.数据[PitchOn] == nil then
        发送数据(user.连接id, 7, "#y/这只召唤兽貌似不存在")
        return true
    end
   local ReturnValue=物品[Item.名称](user,Item,PitchOn)
   user.召唤兽:刷新属性(PitchOn)
   发送数据(user.连接id, 3040, "6")
   return ReturnValue
end
function 道具处理类:召唤兽饰品使用(user,Item,PitchOn)
    if PitchOn==0 then
        发送数据(user.连接id, 7, "#y/请你选中一只召唤兽才能使用")
        return true
    elseif user.召唤兽.数据[PitchOn] == nil then
        发送数据(user.连接id, 7, "#y/这只召唤兽貌似不存在")
        return true
    elseif  user.召唤兽.数据[PitchOn].饰品 then
            发送数据(user.连接id, 7, "#y/这个召唤兽已经拥有饰品")
        return true
    elseif user.召唤兽.数据[PitchOn].造型.."饰品" ==Item.名称 then
        user.召唤兽.数据[PitchOn].饰品 =true
        user.召唤兽:刷新属性(PitchOn)
        发送数据(user.连接id, 7, "#y/恭喜你的#r/"..user.召唤兽.数据[PitchOn].名称.."#y/穿戴饰品成功!")
    end
end